Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/rshow.fm

Text File | 1993-07-16 | 3KB | 588 lines

(standard0)
5
1021
("~a: ~a\10" rshow "" 30 "..." name generic-rshow lambda-list (ob st) method-class argtype 2 methods domain signature function "~a ~a:" "  " (show rshow) ((strip (union (import standard0))) show rshow) rshow)
36
0 0 17 0
5
0 0 0 0
3
0
31
0 0 120 0
17
1
36
0 0 27 0
5
0 0 0 0
4
0 0 21 0
46
1
(boot . make-installed-module)
34
2
36
0 0 50 0
5
0 0 0 0
8
3
4
0 0 19 0
5
0 0 22 0
3
0
39
8
0
5
0 0 23 0
3
0
39
28
1
17
1
1
(boot . install-local-bindings)
34
3
17
1
36
0 0 28 0
5
0 0 1 0
8
3
4
0 0 20 0
1
(boot . make-interface)
34
2
17
1
14
2
1
37
22
0
36
0 2 220 0
11
4
0 0 2 0
5
0 0 0 0
39
51
1
7
0 0 22 0
36
0 2 170 0
11
4
0 0 2 0
6
1
39
51
1
7
0 0 23 0
36
0 2 70 0
11
4
0 0 2 0
6
2
39
51
2
7
0 0 24 0
36
0 0 158 0
1
(init . make)
1
(class-names . <generic-function>)
4
0 0 6 0
3
0
39
9
4
0 0 7 0
3
0
39
29
4
0 0 8 0
3
0
39
29
4
0 0 9 0
3
0
39
29
4
0 0 10 0
3
0
39
29
1
(class-names . <method>)
3
0
39
29
4
0 0 11 0
3
0
39
29
4
0 0 12 0
3
0
39
29
4
0 0 13 0
3
0
39
29
3
0
3
0
39
29
4
0 0 14 0
3
0
39
29
1
(class-names . <object>)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
18
11
34
-2
7
0 0 25 0
36
0 0 142 0
1
(init . add-method)
4
0 0 25 0
36
0 0 120 0
1
(init . make)
36
0 0 22 0
1
(init . generic-method-class)
4
0 0 25 0
10
34
1
4
0 0 15 0
3
0
39
9
1
(class-names . <object>)
3
0
39
9
1
(class-names . <object>)
3
0
39
29
18
3
0
39
29
4
0 0 11 0
3
0
39
29
4
0 0 12 0
3
0
39
29
4
0 0 16 0
3
0
39
29
36
0 0 43 0
8
12
40
2
3
0
39
29
18
11
34
-2
11
33
2
18
1
(classes . class-of)
3
0
62
1
7
0 0 26 0
18
3
1
37
22
2
11
20
0
0
10
20
0
1
36
0 0 23 0
1
(streams1 . print)
12
19
0
0
3
0
11
34
-2
18
36
0 0 89 0
1
(init . mapc)
36
0 0 80 0
8
5
40
1
36
0 0 61 0
1
(init . mapcar)
1
(init . slot-description-name)
36
0 0 33 0
1
(init . class-slot-descriptions)
1
(classes . class-of)
8
12
19
0
0
62
1
10
33
1
3
0
12
34
-3
3
0
12
34
-3
17
4
3
0
37
36
0 0 40 0
1
(extras0 . format)
3
1
4
0 0 17 0
8
5
19
0
1
3
0
39
9
8
8
3
0
39
29
18
12
34
-3
18
4
0 0 24 0
36
0 0 24 0
1
(standard0 . slot-value)
8
4
19
0
0
8
6
11
34
2
1
(strings . string-append)
12
19
0
1
4
0 0 18 0
62
2
11
14
6
3
9
13
4
18
3
0
31
0 0 5 0
1
(arith . >)
1
(strings . string-length)
12
62
1
4
0 0 4 0
3
0
39
62
-2
32
0 0 32 0
1
(extras0 . format)
3
1
4
0 0 5 0
3
0
12
14
8
4
9
13
5
34
-3
4
0 0 25 0
12
12
11
14
7
3
9
13
4
33
2
4
0 0 24 0
11
4
0 0 3 0
11
14
6
3
9
13
4
18
3
0
31
0 0 100 1
22
1
10
20
0
0
1
(init . mapcar)
36
0 0 80 0
12
40
1
36
0 0 61 0
1
(init . mapcar)
1
(init . slot-description-name)
36
0 0 33 0
1
(init . class-slot-descriptions)
1
(classes . class-of)
8
10
19
0
0
62
1
10
33
1
3
0
12
34
-3
3
0
12
14
7
4
9
13
5
34
-3
1
(extras0 . format)
3
1
4
0 0 1 0
8
4
3
0
39
9
36
0 0 24 0
1
(standard0 . slot-value)
8
8
19
0
0
8
10
11
34
2
3
0
39
29
18
12
14
7
4
9
13
5
34
-3